4 IFX=0THENX=1:GOSUB1000: LOAD"UNPACKER",8,1 5 IFX=1THENX=2:LOAD"PIXEL.SHPS",8,1 10 POKE249,224:POKE250,204: REM SCREEN/COLOR 20 POKE251,0:POKE252,64: REM SHP BUFFER 30 POKE253,0:POKE254,0: REM X-POS,Y-POS 35 PRINT"[145][145] [208]RESS SPACE BAR TO VIEW PIXEL PAGE." 37 PRINT" [208]RESS IT AGAIN TO RETURN TO LOADSTAR." 40 WAIT198,1:POKE198,0 41 : 42 S=54272:FORI=0TO24:POKES+I,0:NEXT 43 POKES+5,240:POKES+6,253:POKES,0:POKES+1,4:POKES+23,241:POKES+24,31 44 POKES+4,129 48 : 50 POKE255,0:SYS51462: REM UNPACK BLANK 51 POKE255,1:SYS51462: REM FULL SHUTTLE 52 SYS51459: REM SHOW SCREEN 53 POKE53265,PEEK(53265)OR32: POKE53270,PEEK(53270)OR16:POKE198,0 54 SH=3 55 IFPEEK(198)=0THENPOKE253,0:POKE254,18:POKE255,SH:SYS51462:IFSH=3THENSH=2:GOTO55 56 IFPEEK(198)=0THEN54 57 POKE255,0:SYS51462:SYS51459 58 : 59 FORV=15TO0:POKES+24,V:NEXT 60 PRINT"[147]"SPC(10)"[210]ETURNING TO [204][207][193][196][211][212][193][210]...." 95 LOAD"HELLO CONNECT",8:END 1000 REM MAIN SCREEN 1002 POKE53280,0:POKE53281,0:PRINT"[147]"CHR$(8) 1004 PRINTSPC(13)"[158][204][207][193][196][211][212][193][210] #22" 1006 PRINT""SPC(14)"[208]IXEL[160][208]AGE" 1010 PRINT:PRINT:PRINT 1012 PRINT 1014 PRINT"[158] [204][207][193][196][211][212][193][210] REMEMBERS":PRINT:PRINT 1016 PRINT"[158] THE [195][200][193][204][204][197][206][199][197][210] SEVEN.":PRINT 1018 PRINT" [202]ANUARY 28, 1986":PRINT:PRINT 1020 PRINT"[154] [195]OVER DESIGNED BY [202]ERRY [202]ONES USING" 1022 PRINTSPC(12)"THE [203]OALA PAD." 1030 PRINT"[156] [204]OADING PICTURE...PLEASE WAIT." 1040 RETURN